home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-06-21 | 10.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| TrID
| Adobe PhotoShop Brush
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 f9 e9 28 | 00 00 00 0c 00 00 00 20 |.......(|....... |
|00000010| 00 07 00 00 00 00 00 00 | 27 84 00 00 27 94 00 00 |........|'...'...|
|00000020| 27 a8 00 00 27 a8 00 00 | 27 aa 00 00 27 aa 00 00 |'...'...|'...'...|
|00000030| 27 aa 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |'..-----|--------|
|00000040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 6f 6e 20 73 74 61 |--------|-.on sta|
|00000070| 72 74 4d 6f 76 69 65 0d | 20 20 20 20 67 6c 6f 62 |rtMovie.| glob|
|00000080| 61 6c 20 58 31 59 31 2c | 58 32 59 31 2c 58 33 59 |al X1Y1,|X2Y1,X3Y|
|00000090| 31 2c 58 34 59 31 20 0d | 20 20 20 20 67 6c 6f 62 |1,X4Y1 .| glob|
|000000a0| 61 6c 20 58 31 59 32 2c | 58 32 59 32 2c 58 33 59 |al X1Y2,|X2Y2,X3Y|
|000000b0| 32 2c 58 34 59 32 20 0d | 20 20 20 20 67 6c 6f 62 |2,X4Y2 .| glob|
|000000c0| 61 6c 20 58 31 59 33 2c | 58 32 59 33 2c 58 33 59 |al X1Y3,|X2Y3,X3Y|
|000000d0| 33 2c 58 34 59 33 0d 20 | 20 20 20 67 6c 6f 62 61 |3,X4Y3. | globa|
|000000e0| 6c 20 58 31 59 34 2c 58 | 32 59 34 2c 58 33 59 34 |l X1Y4,X|2Y4,X3Y4|
|000000f0| 2c 58 34 59 34 20 0d 20 | 20 20 20 0d 20 20 20 20 |,X4Y4 . | . |
|00000100| 73 65 74 20 58 31 59 31 | 20 3d 20 30 2a 38 0d 20 |set X1Y1| = 0*8. |
|00000110| 20 20 20 73 65 74 20 58 | 32 59 31 20 3d 20 31 2a | set X|2Y1 = 1*|
|00000120| 38 0d 20 20 20 20 73 65 | 74 20 58 33 59 31 20 3d |8. se|t X3Y1 =|
|00000130| 20 32 2a 38 0d 20 20 20 | 20 73 65 74 20 58 34 59 | 2*8. | set X4Y|
|00000140| 31 20 3d 20 33 2a 38 0d | 20 20 20 20 73 65 74 20 |1 = 3*8.| set |
|00000150| 58 31 59 32 20 3d 20 34 | 2a 38 0d 20 20 20 20 73 |X1Y2 = 4|*8. s|
|00000160| 65 74 20 58 32 59 32 20 | 3d 20 35 2a 38 0d 20 20 |et X2Y2 |= 5*8. |
|00000170| 20 20 73 65 74 20 58 33 | 59 32 20 3d 20 36 2a 38 | set X3|Y2 = 6*8|
|00000180| 0d 20 20 20 20 73 65 74 | 20 58 34 59 32 20 3d 20 |. set| X4Y2 = |
|00000190| 37 2a 38 20 20 20 20 0d | 20 20 20 20 73 65 74 20 |7*8 .| set |
|000001a0| 58 31 59 33 20 3d 20 30 | 2a 38 0d 20 20 20 20 73 |X1Y3 = 0|*8. s|
|000001b0| 65 74 20 58 32 59 33 20 | 3d 20 31 2a 38 0d 20 20 |et X2Y3 |= 1*8. |
|000001c0| 20 20 73 65 74 20 58 33 | 59 33 20 3d 20 32 2a 38 | set X3|Y3 = 2*8|
|000001d0| 0d 20 20 20 20 73 65 74 | 20 58 34 59 33 20 3d 20 |. set| X4Y3 = |
|000001e0| 33 2a 38 0d 20 20 20 20 | 73 65 74 20 58 31 59 34 |3*8. |set X1Y4|
|000001f0| 20 3d 20 34 2a 38 0d 20 | 20 20 20 73 65 74 20 58 | = 4*8. | set X|
|00000200| 32 59 34 20 3d 20 35 2a | 38 0d 20 20 20 20 73 65 |2Y4 = 5*|8. se|
|00000210| 74 20 58 33 59 34 20 3d | 20 36 2a 38 0d 20 20 20 |t X3Y4 =| 6*8. |
|00000220| 20 73 65 74 20 58 34 59 | 34 20 3d 20 37 2a 38 0d | set X4Y|4 = 7*8.|
|00000230| 20 20 20 20 0d 20 20 20 | 20 73 65 74 20 69 3d 30 | . | set i=0|
|00000240| 0d 20 20 20 20 72 65 70 | 65 61 74 20 77 68 69 6c |. rep|eat whil|
|00000250| 65 20 69 3c 34 0d 20 20 | 20 20 20 20 20 20 73 65 |e i<4. | se|
|00000260| 74 20 69 3d 69 2b 31 0d | 20 20 20 20 20 20 20 20 |t i=i+1.| |
|00000270| 0d 20 20 20 20 20 20 20 | 20 69 66 20 72 61 6e 64 |. | if rand|
|00000280| 6f 6d 28 32 29 3d 31 20 | 74 68 65 6e 0d 20 20 20 |om(2)=1 |then. |
|00000290| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 74 6d 70 | | set tmp|
|000002a0| 3d 78 31 79 31 0d 20 20 | 20 20 20 20 20 20 20 20 |=x1y1. | |
|000002b0| 20 20 73 65 74 20 78 31 | 79 31 3d 78 32 79 31 0d | set x1|y1=x2y1.|
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 74 20 | | set |
|000002d0| 78 32 79 31 3d 74 6d 70 | 0d 20 20 20 20 20 20 20 |x2y1=tmp|. |
|000002e0| 20 65 6e 64 20 69 66 0d | 20 20 20 20 20 20 20 20 | end if.| |
|000002f0| 69 66 20 72 61 6e 64 6f | 6d 28 32 29 3d 31 20 74 |if rando|m(2)=1 t|
|00000300| 68 65 6e 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |hen. | |
|00000310| 73 65 74 20 74 6d 70 3d | 78 32 79 31 0d 20 20 20 |set tmp=|x2y1. |
|00000320| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 78 32 79 | | set x2y|
|00000330| 31 3d 78 33 79 31 0d 20 | 20 20 20 20 20 20 20 20 |1=x3y1. | |
|00000340| 20 20 20 73 65 74 20 78 | 33 79 31 3d 74 6d 70 0d | set x|3y1=tmp.|
|00000350| 20 20 20 20 20 20 20 20 | 65 6e 64 20 69 66 0d 20 | |end if. |
|00000360| 20 20 20 20 20 20 20 69 | 66 20 72 61 6e 64 6f 6d | i|f random|
|00000370| 28 32 29 3d 31 20 74 68 | 65 6e 0d 20 20 20 20 20 |(2)=1 th|en. |
|00000380| 20 20 20 20 20 20 20 73 | 65 74 20 74 6d 70 3d 78 | s|et tmp=x|
|00000390| 33 79 31 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |3y1. | |
|000003a0| 73 65 74 20 78 33 79 31 | 3d 78 34 79 31 0d 20 20 |set x3y1|=x4y1. |
|000003b0| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 78 34 | | set x4|
|000003c0| 79 31 3d 74 6d 70 0d 20 | 20 20 20 20 20 20 20 65 |y1=tmp. | e|
|000003d0| 6e 64 20 69 66 0d 20 20 | 20 20 20 20 20 20 69 66 |nd if. | if|
|000003e0| 20 72 61 6e 64 6f 6d 28 | 32 29 3d 31 20 74 68 65 | random(|2)=1 the|
|000003f0| 6e 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |n. | se|
|00000400| 74 20 74 6d 70 3d 78 34 | 79 31 0d 20 20 20 20 20 |t tmp=x4|y1. |
|00000410| 20 20 20 20 20 20 20 73 | 65 74 20 78 34 79 31 3d | s|et x4y1=|
|00000420| 78 31 79 31 0d 20 20 20 | 20 20 20 20 20 20 20 20 |x1y1. | |
|00000430| 20 73 65 74 20 78 31 79 | 31 3d 74 6d 70 0d 20 20 | set x1y|1=tmp. |
|00000440| 20 20 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 20 | en|d if. |
|00000450| 20 20 20 20 20 0d 20 20 | 20 20 20 20 20 20 69 66 | . | if|
|00000460| 20 72 61 6e 64 6f 6d 28 | 32 29 3d 31 20 74 68 65 | random(|2)=1 the|
|00000470| 6e 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 2d 2d |n. | --|
|00000480| 62 65 65 70 20 31 0d 20 | 20 20 20 20 20 20 20 20 |beep 1. | |
|00000490| 20 20 20 73 65 74 20 74 | 6d 70 3d 78 31 79 32 0d | set t|mp=x1y2.|
|000004a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 74 20 | | set |
|000004b0| 78 31 79 32 3d 78 32 79 | 32 0d 20 20 20 20 20 20 |x1y2=x2y|2. |
|000004c0| 20 20 20 20 20 20 73 65 | 74 20 78 32 79 32 3d 74 | se|t x2y2=t|
|000004d0| 6d 70 0d 20 20 20 20 20 | 20 20 20 65 6e 64 20 69 |mp. | end i|
|000004e0| 66 0d 20 20 20 20 20 20 | 20 20 69 66 20 72 61 6e |f. | if ran|
|000004f0| 64 6f 6d 28 32 29 3d 31 | 20 74 68 65 6e 0d 20 20 |dom(2)=1| then. |
|00000500| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 74 6d | | set tm|
|00000510| 70 3d 78 32 79 32 0d 20 | 20 20 20 20 20 20 20 20 |p=x2y2. | |
|00000520| 20 20 20 73 65 74 20 78 | 32 79 32 3d 78 33 79 32 | set x|2y2=x3y2|
|00000530| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|00000540| 20 78 33 79 32 3d 74 6d | 70 0d 20 20 20 20 20 20 | x3y2=tm|p. |
|00000550| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 20 20 20 | end if|. |
|00000560| 20 69 66 20 72 61 6e 64 | 6f 6d 28 32 29 3d 31 20 | if rand|om(2)=1 |
|00000570| 74 68 65 6e 0d 20 20 20 | 20 20 20 20 20 20 20 20 |then. | |
|00000580| 20 73 65 74 20 74 6d 70 | 3d 78 33 79 32 0d 20 20 | set tmp|=x3y2. |
|00000590| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 78 33 | | set x3|
|000005a0| 79 32 3d 78 34 79 32 0d | 20 20 20 20 20 20 20 20 |y2=x4y2.| |
|000005b0| 20 20 20 20 73 65 74 20 | 78 34 79 32 3d 74 6d 70 | set |x4y2=tmp|
|000005c0| 0d 20 20 20 20 20 20 20 | 20 65 6e 64 20 69 66 0d |. | end if.|
|000005d0| 20 20 20 20 20 20 20 20 | 69 66 20 72 61 6e 64 6f | |if rando|
|000005e0| 6d 28 32 29 3d 31 20 74 | 68 65 6e 0d 20 20 20 20 |m(2)=1 t|hen. |
|000005f0| 20 20 20 20 20 20 20 20 | 73 65 74 20 74 6d 70 3d | |set tmp=|
|00000600| 78 34 79 32 0d 20 20 20 | 20 20 20 20 20 20 20 20 |x4y2. | |
|00000610| 20 73 65 74 20 78 34 79 | 32 3d 78 31 79 32 0d 20 | set x4y|2=x1y2. |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|00000630| 31 79 32 3d 74 6d 70 0d | 20 20 20 20 20 20 20 20 |1y2=tmp.| |
|00000640| 65 6e 64 20 69 66 0d 20 | 20 20 20 20 20 20 20 0d |end if. | .|
|00000650| 20 20 20 20 20 20 20 20 | 69 66 20 72 61 6e 64 6f | |if rando|
|00000660| 6d 28 32 29 3d 31 20 74 | 68 65 6e 0d 20 20 20 20 |m(2)=1 t|hen. |
|00000670| 20 20 20 20 20 20 20 20 | 73 65 74 20 74 6d 70 3d | |set tmp=|
|00000680| 78 31 79 33 0d 20 20 20 | 20 20 20 20 20 20 20 20 |x1y3. | |
|00000690| 20 73 65 74 20 78 31 79 | 33 3d 78 32 79 33 0d 20 | set x1y|3=x2y3. |
|000006a0| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|000006b0| 32 79 33 3d 74 6d 70 0d | 20 20 20 20 20 20 20 20 |2y3=tmp.| |
|000006c0| 65 6e 64 20 69 66 0d 20 | 20 20 20 20 20 20 20 69 |end if. | i|
|000006d0| 66 20 72 61 6e 64 6f 6d | 28 32 29 3d 31 20 74 68 |f random|(2)=1 th|
|000006e0| 65 6e 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |en. | s|
|000006f0| 65 74 20 74 6d 70 3d 78 | 32 79 33 0d 20 20 20 20 |et tmp=x|2y3. |
|00000700| 20 20 20 20 20 20 20 20 | 73 65 74 20 78 32 79 33 | |set x2y3|
|00000710| 3d 78 33 79 33 0d 20 20 | 20 20 20 20 20 20 20 20 |=x3y3. | |
|00000720| 20 20 73 65 74 20 78 33 | 79 33 3d 74 6d 70 0d 20 | set x3|y3=tmp. |
|00000730| 20 20 20 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 | e|nd if. |
|00000740| 20 20 20 20 20 20 69 66 | 20 72 61 6e 64 6f 6d 28 | if| random(|
|00000750| 32 29 3d 31 20 74 68 65 | 6e 0d 20 20 20 20 20 20 |2)=1 the|n. |
|00000760| 20 20 20 20 20 20 73 65 | 74 20 74 6d 70 3d 78 33 | se|t tmp=x3|
|00000770| 79 33 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |y3. | s|
|00000780| 65 74 20 78 33 79 33 3d | 78 34 79 33 0d 20 20 20 |et x3y3=|x4y3. |
|00000790| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 78 34 79 | | set x4y|
|000007a0| 33 3d 74 6d 70 0d 20 20 | 20 20 20 20 20 20 65 6e |3=tmp. | en|
|000007b0| 64 20 69 66 0d 20 20 20 | 20 20 20 20 20 69 66 20 |d if. | if |
|000007c0| 72 61 6e 64 6f 6d 28 32 | 29 3d 31 20 74 68 65 6e |random(2|)=1 then|
|000007d0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|000007e0| 20 74 6d 70 3d 78 34 79 | 33 0d 20 20 20 20 20 20 | tmp=x4y|3. |
|000007f0| 20 20 20 20 20 20 73 65 | 74 20 78 34 79 33 3d 78 | se|t x4y3=x|
|00000800| 31 79 33 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |1y3. | |
|00000810| 73 65 74 20 78 31 79 33 | 3d 74 6d 70 0d 20 20 20 |set x1y3|=tmp. |
|00000820| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 | end| if. |
|00000830| 20 20 20 20 0d 20 20 20 | 20 20 20 20 20 69 66 20 | . | if |
|00000840| 72 61 6e 64 6f 6d 28 32 | 29 3d 31 20 74 68 65 6e |random(2|)=1 then|
|00000850| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|00000860| 20 74 6d 70 3d 78 31 79 | 34 0d 20 20 20 20 20 20 | tmp=x1y|4. |
|00000870| 20 20 20 20 20 20 73 65 | 74 20 78 31 79 34 3d 78 | se|t x1y4=x|
|00000880| 32 79 34 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |2y4. | |
|00000890| 73 65 74 20 78 32 79 34 | 3d 74 6d 70 0d 20 20 20 |set x2y4|=tmp. |
|000008a0| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 | end| if. |
|000008b0| 20 20 20 20 69 66 20 72 | 61 6e 64 6f 6d 28 32 29 | if r|andom(2)|
|000008c0| 3d 31 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 |=1 then.| |
|000008d0| 20 20 20 20 73 65 74 20 | 74 6d 70 3d 78 32 79 34 | set |tmp=x2y4|
|000008e0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|000008f0| 20 78 32 79 34 3d 78 33 | 79 34 0d 20 20 20 20 20 | x2y4=x3|y4. |
|00000900| 20 20 20 20 20 20 20 73 | 65 74 20 78 33 79 34 3d | s|et x3y4=|
|00000910| 74 6d 70 0d 20 20 20 20 | 20 20 20 20 65 6e 64 20 |tmp. | end |
|00000920| 69 66 0d 20 20 20 20 20 | 20 20 20 69 66 20 72 61 |if. | if ra|
|00000930| 6e 64 6f 6d 28 32 29 3d | 31 20 74 68 65 6e 0d 20 |ndom(2)=|1 then. |
|00000940| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 74 | | set t|
|00000950| 6d 70 3d 78 33 79 34 0d | 20 20 20 20 20 20 20 20 |mp=x3y4.| |
|00000960| 20 20 20 20 73 65 74 20 | 78 33 79 34 3d 78 34 79 | set |x3y4=x4y|
|00000970| 34 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |4. | se|
|00000980| 74 20 78 34 79 34 3d 74 | 6d 70 0d 20 20 20 20 20 |t x4y4=t|mp. |
|00000990| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 20 20 | end i|f. |
|000009a0| 20 20 69 66 20 72 61 6e | 64 6f 6d 28 32 29 3d 31 | if ran|dom(2)=1|
|000009b0| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 20 20 | then. | |
|000009c0| 20 20 73 65 74 20 74 6d | 70 3d 78 34 79 34 0d 20 | set tm|p=x4y4. |
|000009d0| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|000009e0| 34 79 34 3d 78 31 79 34 | 0d 20 20 20 20 20 20 20 |4y4=x1y4|. |
|000009f0| 20 20 20 20 20 73 65 74 | 20 78 31 79 34 3d 74 6d | set| x1y4=tm|
|00000a00| 70 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |p. | end if|
|00000a10| 0d 20 20 20 20 20 20 20 | 20 0d 20 20 20 20 20 20 |. | . |
|00000a20| 20 20 2d 2d 20 59 20 63 | 6c 6f 73 73 69 6e 67 0d | -- Y c|lossing.|
|00000a30| 20 20 20 20 20 20 20 20 | 69 66 20 72 61 6e 64 6f | |if rando|
|00000a40| 6d 28 32 29 3d 31 20 74 | 68 65 6e 0d 20 20 20 20 |m(2)=1 t|hen. |
|00000a50| 20 20 20 20 20 20 20 20 | 73 65 74 20 74 6d 70 3d | |set tmp=|
|00000a60| 78 31 79 31 0d 20 20 20 | 20 20 20 20 20 20 20 20 |x1y1. | |
|00000a70| 20 73 65 74 20 78 31 79 | 31 3d 78 31 79 32 0d 20 | set x1y|1=x1y2. |
|00000a80| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|00000a90| 31 79 32 3d 74 6d 70 0d | 20 20 20 20 20 20 20 20 |1y2=tmp.| |
|00000aa0| 65 6e 64 20 69 66 0d 20 | 20 20 20 20 20 20 20 69 |end if. | i|
|00000ab0| 66 20 72 61 6e 64 6f 6d | 28 32 29 3d 31 20 74 68 |f random|(2)=1 th|
|00000ac0| 65 6e 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |en. | s|
|00000ad0| 65 74 20 74 6d 70 3d 78 | 32 79 31 0d 20 20 20 20 |et tmp=x|2y1. |
|00000ae0| 20 20 20 20 20 20 20 20 | 73 65 74 20 78 32 79 31 | |set x2y1|
|00000af0| 3d 78 32 79 32 0d 20 20 | 20 20 20 20 20 20 20 20 |=x2y2. | |
|00000b00| 20 20 73 65 74 20 78 32 | 79 32 3d 74 6d 70 0d 20 | set x2|y2=tmp. |
|00000b10| 20 20 20 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 | e|nd if. |
|00000b20| 20 20 20 20 20 20 69 66 | 20 72 61 6e 64 6f 6d 28 | if| random(|
|00000b30| 32 29 3d 31 20 74 68 65 | 6e 0d 20 20 20 20 20 20 |2)=1 the|n. |
|00000b40| 20 20 20 20 20 20 73 65 | 74 20 74 6d 70 3d 78 33 | se|t tmp=x3|
|00000b50| 79 31 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |y1. | s|
|00000b60| 65 74 20 78 33 79 31 3d | 78 33 79 32 0d 20 20 20 |et x3y1=|x3y2. |
|00000b70| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 78 33 79 | | set x3y|
|00000b80| 32 3d 74 6d 70 0d 20 20 | 20 20 20 20 20 20 65 6e |2=tmp. | en|
|00000b90| 64 20 69 66 0d 20 20 20 | 20 20 20 20 20 69 66 20 |d if. | if |
|00000ba0| 72 61 6e 64 6f 6d 28 32 | 29 3d 31 20 74 68 65 6e |random(2|)=1 then|
|00000bb0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|00000bc0| 20 74 6d 70 3d 78 34 79 | 31 0d 20 20 20 20 20 20 | tmp=x4y|1. |
|00000bd0| 20 20 20 20 20 20 73 65 | 74 20 78 34 79 31 3d 78 | se|t x4y1=x|
|00000be0| 34 79 32 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |4y2. | |
|00000bf0| 73 65 74 20 78 34 79 32 | 3d 74 6d 70 0d 20 20 20 |set x4y2|=tmp. |
|00000c00| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 | end| if. |
|00000c10| 20 20 20 20 0d 20 20 20 | 20 20 20 20 20 69 66 20 | . | if |
|00000c20| 72 61 6e 64 6f 6d 28 32 | 29 3d 31 20 74 68 65 6e |random(2|)=1 then|
|00000c30| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|00000c40| 20 74 6d 70 3d 78 31 79 | 32 0d 20 20 20 20 20 20 | tmp=x1y|2. |
|00000c50| 20 20 20 20 20 20 73 65 | 74 20 78 31 79 32 3d 78 | se|t x1y2=x|
|00000c60| 31 79 33 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |1y3. | |
|00000c70| 73 65 74 20 78 31 79 33 | 3d 74 6d 70 0d 20 20 20 |set x1y3|=tmp. |
|00000c80| 20 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 | end| if. |
|00000c90| 20 20 20 20 69 66 20 72 | 61 6e 64 6f 6d 28 32 29 | if r|andom(2)|
|00000ca0| 3d 31 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 |=1 then.| |
|00000cb0| 20 20 20 20 73 65 74 20 | 74 6d 70 3d 78 32 79 32 | set |tmp=x2y2|
|00000cc0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 73 65 74 |. | set|
|00000cd0| 20 78 32 79 32 3d 78 32 | 79 33 0d 20 20 20 20 20 | x2y2=x2|y3. |
|00000ce0| 20 20 20 20 20 20 20 73 | 65 74 20 78 32 79 33 3d | s|et x2y3=|
|00000cf0| 74 6d 70 0d 20 20 20 20 | 20 20 20 20 65 6e 64 20 |tmp. | end |
|00000d00| 69 66 0d 20 20 20 20 20 | 20 20 20 69 66 20 72 61 |if. | if ra|
|00000d10| 6e 64 6f 6d 28 32 29 3d | 31 20 74 68 65 6e 0d 20 |ndom(2)=|1 then. |
|00000d20| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 74 | | set t|
|00000d30| 6d 70 3d 78 33 79 32 0d | 20 20 20 20 20 20 20 20 |mp=x3y2.| |
|00000d40| 20 20 20 20 73 65 74 20 | 78 33 79 32 3d 78 33 79 | set |x3y2=x3y|
|00000d50| 33 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |3. | se|
|00000d60| 74 20 78 33 79 33 3d 74 | 6d 70 0d 20 20 20 20 20 |t x3y3=t|mp. |
|00000d70| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 20 20 | end i|f. |
|00000d80| 20 20 69 66 20 72 61 6e | 64 6f 6d 28 32 29 3d 31 | if ran|dom(2)=1|
|00000d90| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 20 20 | then. | |
|00000da0| 20 20 73 65 74 20 74 6d | 70 3d 78 34 79 32 0d 20 | set tm|p=x4y2. |
|00000db0| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|00000dc0| 34 79 32 3d 78 34 79 33 | 0d 20 20 20 20 20 20 20 |4y2=x4y3|. |
|00000dd0| 20 20 20 20 20 73 65 74 | 20 78 34 79 33 3d 74 6d | set| x4y3=tm|
|00000de0| 70 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |p. | end if|
|00000df0| 0d 20 20 20 20 20 20 20 | 20 0d 20 20 20 20 20 20 |. | . |
|00000e00| 20 20 69 66 20 72 61 6e | 64 6f 6d 28 32 29 3d 31 | if ran|dom(2)=1|
|00000e10| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 20 20 | then. | |
|00000e20| 20 20 73 65 74 20 74 6d | 70 3d 78 31 79 33 0d 20 | set tm|p=x1y3. |
|00000e30| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 78 | | set x|
|00000e40| 31 79 33 3d 78 31 79 34 | 0d 20 20 20 20 20 20 20 |1y3=x1y4|. |
|00000e50| 20 20 20 20 20 73 65 74 | 20 78 31 79 34 3d 74 6d | set| x1y4=tm|
|00000e60| 70 0d 20 20 20 20 20 20 | 20 20 65 6e 64 20 69 66 |p. | end if|
|00000e70| 0d 20 20 20 20 20 20 20 | 20 69 66 20 72 61 6e 64 |. | if rand|
|00000e80| 6f 6d 28 32 29 3d 31 20 | 74 68 65 6e 0d 20 20 20 |om(2)=1 |then. |
|00000e90| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 74 6d 70 | | set tmp|
|00000ea0| 3d 78 32 79 33 0d 20 20 | 20 20 20 20 20 20 20 20 |=x2y3. | |
|00000eb0| 20 20 73 65 74 20 78 32 | 79 33 3d 78 32 79 34 0d | set x2|y3=x2y4.|
|00000ec0| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 74 20 | | set |
|00000ed0| 78 32 79 34 3d 74 6d 70 | 0d 20 20 20 20 20 20 20 |x2y4=tmp|. |
|00000ee0| 20 65 6e 64 20 69 66 0d | 20 20 20 20 20 20 20 20 | end if.| |
|00000ef0| 69 66 20 72 61 6e 64 6f | 6d 28 32 29 3d 31 20 74 |if rando|m(2)=1 t|
|00000f00| 68 65 6e 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |hen. | |
|00000f10| 73 65 74 20 74 6d 70 3d | 78 33 79 33 0d 20 20 20 |set tmp=|x3y3. |
|00000f20| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 78 33 79 | | set x3y|
|00000f30| 33 3d 78 33 79 34 0d 20 | 20 20 20 20 20 20 20 20 |3=x3y4. | |
|00000f40| 20 20 20 73 65 74 20 78 | 33 79 34 3d 74 6d 70 0d | set x|3y4=tmp.|
|00000f50| 20 20 20 20 20 20 20 20 | 65 6e 64 20 69 66 0d 20 | |end if. |
|00000f60| 20 20 20 20 20 20 20 69 | 66 20 72 61 6e 64 6f 6d | i|f random|
|00000f70| 28 32 29 3d 31 20 74 68 | 65 6e 0d 20 20 20 20 20 |(2)=1 th|en. |
|00000f80| 20 20 20 20 20 20 20 73 | 65 74 20 74 6d 70 3d 78 | s|et tmp=x|
|00000f90| 34 79 33 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |4y3. | |
|00000fa0| 73 65 74 20 78 34 79 33 | 3d 78 34 79 34 0d 20 20 |set x4y3|=x4y4. |
|00000fb0| 20 20 20 20 20 20 20 20 | 20 20 73 65 74 20 78 34 | | set x4|
|00000fc0| 79 34 3d 74 6d 70 0d 20 | 20 20 20 20 20 20 20 65 |y4=tmp. | e|
|00000fd0| 6e 64 20 69 66 0d 20 20 | 20 20 20 20 20 20 0d 20 |nd if. | . |
|00000fe0| 20 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 | end r|epeat. |
|00000ff0| 20 20 0d 20 20 20 20 0d | 20 20 20 20 67 6c 6f 62 | . .| glob|
|00001000| 61 6c 20 43 61 72 64 4f | 66 73 2c 43 61 72 64 50 |al CardO|fs,CardP|
|00001010| 74 72 2c 43 72 61 64 30 | 4f 66 73 0d 20 20 20 20 |tr,Crad0|Ofs. |
|00001020| 73 65 74 20 43 61 72 64 | 50 74 72 3d 30 0d 20 20 |set Card|Ptr=0. |
|00001030| 20 20 73 65 74 20 43 61 | 72 64 30 4f 66 73 3d 30 | set Ca|rd0Ofs=0|
|00001040| 0d 20 20 20 20 0d 20 20 | 20 20 67 6c 6f 62 61 6c |. . | global|
|00001050| 20 53 63 6f 72 65 2c 43 | 6f 75 6e 74 2c 5f 53 54 | Score,C|ount,_ST|
|00001060| 72 79 43 6f 75 6e 74 2c | 4b 61 69 73 75 0d 20 20 |ryCount,|Kaisu. |
|00001070| 20 20 73 65 74 20 53 63 | 6f 72 65 3d 30 0d 20 20 | set Sc|ore=0. |
|00001080| 20 20 70 75 74 20 53 63 | 6f 72 65 20 69 6e 74 6f | put Sc|ore into|
|00001090| 20 66 69 65 6c 64 20 22 | 53 63 6f 72 65 22 0d 20 | field "|Score". |
|000010a0| 20 20 20 73 65 74 20 43 | 6f 75 6e 74 3d 4b 61 69 | set C|ount=Kai|
|000010b0| 73 75 0d 20 20 20 20 2d | 2d 73 65 74 20 43 6f 75 |su. -|-set Cou|
|000010c0| 6e 74 3d 5f 53 54 72 79 | 43 6f 75 6e 74 0d 20 20 |nt=_STry|Count. |
|000010d0| 20 20 70 75 74 20 43 6f | 75 6e 74 20 69 6e 74 6f | put Co|unt into|
|000010e0| 20 66 69 65 6c 64 20 22 | 43 6f 75 6e 74 22 0d 20 | field "|Count". |
|000010f0| 20 20 20 70 75 74 20 22 | 82 aa 82 f1 82 ce 82 c1 | put "|........|
|00001100| 82 c4 82 cb 21 22 20 69 | 6e 74 6f 20 66 69 65 6c |....!" i|nto fiel|
|00001110| 64 20 22 4d 73 67 42 6f | 78 22 0d 20 20 20 20 0d |d "MsgBo|x". .|
|00001120| 65 6e 64 20 73 74 61 72 | 74 4d 6f 76 69 65 0d 0d |end star|tMovie..|
|00001130| 0d 6f 6e 20 69 64 6c 65 | 0d 20 20 20 20 67 6c 6f |.on idle|. glo|
|00001140| 62 61 6c 20 43 6f 75 6e | 74 2c 53 63 6f 72 65 2c |bal Coun|t,Score,|
|00001150| 5f 53 70 6f 69 6e 74 2c | 43 61 72 64 49 44 2c 43 |_Spoint,|CardID,C|
|00001160| 61 72 64 4f 66 73 0d 20 | 20 20 20 67 6c 6f 62 61 |ardOfs. | globa|
|00001170| 6c 20 58 31 59 31 2c 58 | 32 59 31 2c 58 33 59 31 |l X1Y1,X|2Y1,X3Y1|
|00001180| 2c 58 34 59 31 20 0d 20 | 20 20 20 67 6c 6f 62 61 |,X4Y1 . | globa|
|00001190| 6c 20 58 31 59 32 2c 58 | 32 59 32 2c 58 33 59 32 |l X1Y2,X|2Y2,X3Y2|
|000011a0| 2c 58 34 59 32 20 0d 20 | 20 20 20 67 6c 6f 62 61 |,X4Y2 . | globa|
|000011b0| 6c 20 58 31 59 33 2c 58 | 32 59 33 2c 58 33 59 33 |l X1Y3,X|2Y3,X3Y3|
|000011c0| 2c 58 34 59 33 0d 20 20 | 20 20 67 6c 6f 62 61 6c |,X4Y3. | global|
|000011d0| 20 58 31 59 34 2c 58 32 | 59 34 2c 58 33 59 34 2c | X1Y4,X2|Y4,X3Y4,|
|000011e0| 58 34 59 34 20 0d 20 20 | 20 20 0d 20 20 20 20 69 |X4Y4 . | . i|
|000011f0| 66 20 43 6f 75 6e 74 3d | 30 20 74 68 65 6e 0d 20 |f Count=|0 then. |
|00001200| 20 20 20 20 20 20 20 70 | 75 74 20 22 82 a8 82 b5 | p|ut "....|
|00001210| 82 dc 82 a2 21 22 20 69 | 6e 74 6f 20 66 69 65 6c |....!" i|nto fiel|
|00001220| 64 20 22 4d 73 67 42 6f | 78 22 0d 20 20 20 20 20 |d "MsgBo|x". |
|00001230| 20 20 20 0d 20 20 20 20 | 20 20 20 20 73 65 74 20 | . | set |
|00001240| 43 61 72 64 49 44 3d 30 | 2a 38 0d 20 20 20 20 20 |CardID=0|*8. |
|00001250| 20 20 20 73 65 74 20 43 | 61 72 64 4f 66 73 3d 58 | set C|ardOfs=X|
|00001260| 31 59 31 0d 20 20 20 20 | 20 20 20 20 58 43 61 72 |1Y1. | XCar|
|00001270| 64 4f 70 65 6e 0d 20 20 | 20 20 20 20 20 20 73 65 |dOpen. | se|
|00001280| 74 20 43 61 72 64 49 44 | 3d 31 2a 38 0d 20 20 20 |t CardID|=1*8. |
|00001290| 20 20 20 20 20 73 65 74 | 20 43 61 72 64 4f 66 73 | set| CardOfs|
|000012a0| 3d 58 32 59 31 0d 20 20 | 20 20 20 20 20 20 58 43 |=X2Y1. | XC|
|000012b0| 61 72 64 4f 70 65 6e 0d | 20 20 20 20 20 20 20 20 |ardOpen.| |
|000012c0| 73 65 74 20 43 61 72 64 | 49 44 3d 32 2a 38 0d 20 |set Card|ID=2*8. |
|000012d0| 20 20 20 20 20 20 20 73 | 65 74 20 43 61 72 64 4f | s|et CardO|
|000012e0| 66 73 3d 58 33 59 31 0d | 20 20 20 20 20 20 20 20 |fs=X3Y1.| |
|000012f0| 58 43 61 72 64 4f 70 65 | 6e 0d 20 20 20 20 20 20 |XCardOpe|n. |
|00001300| 20 20 73 65 74 20 43 61 | 72 64 49 44 3d 33 2a 38 | set Ca|rdID=3*8|
|00001310| 0d 20 20 20 20 20 20 20 | 20 73 65 74 20 43 61 72 |. | set Car|
|00001320| 64 4f 66 73 3d 58 34 59 | 31 0d 20 20 20 20 20 20 |dOfs=X4Y|1. |
|00001330| 20 20 58 43 61 72 64 4f | 70 65 6e 0d 20 20 20 20 | XCardO|pen. |
|00001340| 20 20 20 20 73 65 74 20 | 43 61 72 64 49 44 3d 34 | set |CardID=4|
|00001350| 2a 38 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 43 |*8. | set C|
|00001360| 61 72 64 4f 66 73 3d 58 | 31 59 32 0d 20 20 20 20 |ardOfs=X|1Y2. |
|00001370| 20 20 20 20 58 43 61 72 | 64 4f 70 65 6e 0d 20 20 | XCar|dOpen. |
|00001380| 20 20 20 20 20 20 73 65 | 74 20 43 61 72 64 49 44 | se|t CardID|
|00001390| 3d 35 2a 38 0d 20 20 20 | 20 20 20 20 20 73 65 74 |=5*8. | set|
|000013a0| 20 43 61 72 64 4f 66 73 | 3d 58 32 59 32 0d 20 20 | CardOfs|=X2Y2. |
|000013b0| 20 20 20 20 20 20 58 43 | 61 72 64 4f 70 65 6e 0d | XC|ardOpen.|
|000013c0| 20 20 20 20 20 20 20 20 | 73 65 74 20 43 61 72 64 | |set Card|
|000013d0| 49 44 3d 36 2a 38 0d 20 | 20 20 20 20 20 20 20 73 |ID=6*8. | s|
|000013e0| 65 74 20 43 61 72 64 4f | 66 73 3d 58 33 59 32 0d |et CardO|fs=X3Y2.|
|000013f0| 20 20 20 20 20 20 20 20 | 58 43 61 72 64 4f 70 65 | |XCardOpe|
|00001400| 6e 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 43 61 |n. | set Ca|
|00001410| 72 64 49 44 3d 37 2a 38 | 0d 20 20 20 20 20 20 20 |rdID=7*8|. |
|00001420| 20 73 65 74 20 43 61 72 | 64 4f 66 73 3d 58 34 59 | set Car|dOfs=X4Y|
|00001430| 32 0d 20 20 20 20 20 20 | 20 20 58 43 61 72 64 4f |2. | XCardO|
|00001440| 70 65 6e 0d 20 20 20 20 | 20 20 20 20 73 65 74 20 |pen. | set |
|00001450| 43 61 72 64 49 44 3d 38 | 2a 38 0d 20 20 20 20 20 |CardID=8|*8. |
|00001460| 20 20 20 73 65 74 20 43 | 61 72 64 4f 66 73 3d 58 | set C|ardOfs=X|
|00001470| 31 59 33 0d 20 20 20 20 | 20 20 20 20 58 43 61 72 |1Y3. | XCar|
|00001480| 64 4f 70 65 6e 0d 20 20 | 20 20 20 20 20 20 73 65 |dOpen. | se|
|00001490| 74 20 43 61 72 64 49 44 | 3d 39 2a 38 0d 20 20 20 |t CardID|=9*8. |
|000014a0| 20 20 20 20 20 73 65 74 | 20 43 61 72 64 4f 66 73 | set| CardOfs|
|000014b0| 3d 58 32 59 33 0d 20 20 | 20 20 20 20 20 20 58 43 |=X2Y3. | XC|
|000014c0| 61 72 64 4f 70 65 6e 0d | 20 20 20 20 20 20 20 20 |ardOpen.| |
|000014d0| 73 65 74 20 43 61 72 64 | 49 44 3d 31 30 2a 38 0d |set Card|ID=10*8.|
|000014e0| 20 20 20 20 20 20 20 20 | 73 65 74 20 43 61 72 64 | |set Card|
|000014f0| 4f 66 73 3d 58 33 59 33 | 0d 20 20 20 20 20 20 20 |Ofs=X3Y3|. |
|00001500| 20 58 43 61 72 64 4f 70 | 65 6e 0d 20 20 20 20 20 | XCardOp|en. |
|00001510| 20 20 20 73 65 74 20 43 | 61 72 64 49 44 3d 31 31 | set C|ardID=11|
|00001520| 2a 38 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 43 |*8. | set C|
|00001530| 61 72 64 4f 66 73 3d 58 | 34 59 33 0d 20 20 20 20 |ardOfs=X|4Y3. |
|00001540| 20 20 20 20 58 43 61 72 | 64 4f 70 65 6e 0d 20 20 | XCar|dOpen. |
|00001550| 20 20 20 20 20 20 73 65 | 74 20 43 61 72 64 49 44 | se|t CardID|
|00001560| 3d 31 32 2a 38 0d 20 20 | 20 20 20 20 20 20 73 65 |=12*8. | se|
|00001570| 74 20 43 61 72 64 4f 66 | 73 3d 58 31 59 34 0d 20 |t CardOf|s=X1Y4. |
|00001580| 20 20 20 20 20 20 20 58 | 43 61 72 64 4f 70 65 6e | X|CardOpen|
|00001590| 0d 20 20 20 20 20 20 20 | 20 73 65 74 20 43 61 72 |. | set Car|
|000015a0| 64 49 44 3d 31 33 2a 38 | 0d 20 20 20 20 20 20 20 |dID=13*8|. |
|000015b0| 20 73 65 74 20 43 61 72 | 64 4f 66 73 3d 58 32 59 | set Car|dOfs=X2Y|
|000015c0| 34 0d 20 20 20 20 20 20 | 20 20 58 43 61 72 64 4f |4. | XCardO|
|000015d0| 70 65 6e 0d 20 20 20 20 | 20 20 20 20 73 65 74 20 |pen. | set |
|000015e0| 43 61 72 64 49 44 3d 31 | 34 2a 38 0d 20 20 20 20 |CardID=1|4*8. |
|000015f0| 20 20 20 20 73 65 74 20 | 43 61 72 64 4f 66 73 3d | set |CardOfs=|
|00001600| 58 33 59 34 0d 20 20 20 | 20 20 20 20 20 58 43 61 |X3Y4. | XCa|
|00001610| 72 64 4f 70 65 6e 0d 20 | 20 20 20 20 20 20 20 73 |rdOpen. | s|
|00001620| 65 74 20 43 61 72 64 49 | 44 3d 31 35 2a 38 0d 20 |et CardI|D=15*8. |
|00001630| 20 20 20 20 20 20 20 73 | 65 74 20 43 61 72 64 4f | s|et CardO|
|00001640| 66 73 3d 58 34 59 34 0d | 20 20 20 20 20 20 20 20 |fs=X4Y4.| |
|00001650| 58 43 61 72 64 4f 70 65 | 6e 0d 20 20 20 20 20 20 |XCardOpe|n. |
|00001660| 20 20 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 6c | . | set l|
|00001670| 63 6e 74 3d 74 68 65 20 | 74 69 63 6b 73 20 0d 20 |cnt=the |ticks . |
|00001680| 20 20 20 20 20 20 20 72 | 65 70 65 61 74 20 77 68 | r|epeat wh|
|00001690| 69 6c 65 20 74 68 65 20 | 74 69 63 6b 73 3c 6c 63 |ile the |ticks<lc|
|000016a0| 6e 74 2b 31 38 30 0d 20 | 20 20 20 20 20 20 20 20 |nt+180. | |
|000016b0| 20 20 20 75 70 64 61 74 | 65 53 74 61 67 65 0d 20 | updat|eStage. |
|000016c0| 20 20 20 20 20 20 20 65 | 6e 64 20 72 65 70 65 61 | e|nd repea|
|000016d0| 74 0d 20 20 20 20 20 20 | 20 20 0d 20 20 20 20 20 |t. | . |
|000016e0| 20 20 20 73 65 74 20 5f | 53 70 6f 69 6e 74 3d 53 | set _|Spoint=S|
|000016f0| 63 6f 72 65 0d 20 20 20 | 20 20 20 20 20 53 63 6f |core. | Sco|
|00001700| 72 65 32 63 6f 75 6e 74 | 0d 20 20 20 20 20 20 20 |re2count|. |
|00001710| 20 67 6f 20 22 65 78 69 | 74 22 20 20 20 20 0d 20 | go "exi|t" . |
|00001720| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 69 66 | end i|f. if|
|00001730| 20 53 63 6f 72 65 3d 36 | 30 20 74 68 65 6e 0d 20 | Score=6|0 then. |
|00001740| 20 20 20 20 20 20 20 53 | 63 6f 72 65 32 43 6f 75 | S|core2Cou|
|00001750| 6e 74 0d 20 20 20 20 20 | 20 20 20 73 65 74 20 5f |nt. | set _|
|00001760| 53 70 6f 69 6e 74 3d 53 | 63 6f 72 65 0d 20 20 20 |Spoint=S|core. |
|00001770| 20 20 20 20 20 73 65 74 | 20 53 63 6f 72 65 20 3d | set| Score =|
|00001780| 20 30 0d 20 20 20 20 20 | 20 20 20 67 6f 20 22 65 | 0. | go "e|
|00001790| 78 69 74 22 20 20 20 0d | 20 20 20 20 65 6e 64 20 |xit" .| end |
|000017a0| 69 66 0d 65 6e 64 20 69 | 64 6c 65 0d 0d 6f 6e 20 |if.end i|dle..on |
|000017b0| 53 63 6f 72 65 32 43 6f | 75 6e 74 0d 20 20 20 20 |Score2Co|unt. |
|000017c0| 67 6c 6f 62 61 6c 20 53 | 63 6f 72 65 2c 43 6f 75 |global S|core,Cou|
|000017d0| 6e 74 0d 20 20 20 20 73 | 65 74 20 63 6f 75 6e 74 |nt. s|et count|
|000017e0| 20 3d 20 31 0d 20 20 20 | 20 69 66 20 53 63 6f 72 | = 1. | if Scor|
|000017f0| 65 20 3e 3d 20 31 30 20 | 74 68 65 6e 20 73 65 74 |e >= 10 |then set|
|00001800| 20 63 6f 75 6e 74 20 3d | 20 32 0d 20 20 20 20 69 | count =| 2. i|
|00001810| 66 20 53 63 6f 72 65 20 | 3e 3d 20 32 30 20 74 68 |f Score |>= 20 th|
|00001820| 65 6e 20 73 65 74 20 63 | 6f 75 6e 74 20 3d 20 33 |en set c|ount = 3|
|00001830| 0d 20 20 20 20 69 66 20 | 53 63 6f 72 65 20 3e 3d |. if |Score >=|
|00001840| 20 33 30 20 74 68 65 6e | 20 73 65 74 20 63 6f 75 | 30 then| set cou|
|00001850| 6e 74 20 3d 20 34 0d 20 | 20 20 20 69 66 20 53 63 |nt = 4. | if Sc|
|00001860| 6f 72 65 20 3e 3d 20 34 | 30 20 74 68 65 6e 20 73 |ore >= 4|0 then s|
|00001870| 65 74 20 63 6f 75 6e 74 | 20 3d 20 35 0d 20 20 20 |et count| = 5. |
|00001880| 20 69 66 20 53 63 6f 72 | 65 20 3e 3d 20 35 30 20 | if Scor|e >= 50 |
|00001890| 74 68 65 6e 20 73 65 74 | 20 63 6f 75 6e 74 20 3d |then set| count =|
|000018a0| 20 36 0d 65 6e 64 20 53 | 63 6f 72 65 32 43 6f 75 | 6.end S|core2Cou|
|000018b0| 6e 74 0d 0d 6f 6e 20 43 | 61 72 64 4f 70 65 6e 0d |nt..on C|ardOpen.|
|000018c0| 20 20 20 20 67 6c 6f 62 | 61 6c 20 43 61 72 64 4f | glob|al CardO|
|000018d0| 66 73 2c 43 61 72 64 50 | 74 72 0d 20 20 20 20 67 |fs,CardP|tr. g|
|000018e0| 6c 6f 62 61 6c 20 53 63 | 6f 72 65 2c 43 6f 75 6e |lobal Sc|ore,Coun|
|000018f0| 74 0d 20 20 20 20 67 6c | 6f 62 61 6c 20 43 61 72 |t. gl|obal Car|
|00001900| 64 30 4f 66 73 2c 43 61 | 72 64 30 49 44 2c 43 61 |d0Ofs,Ca|rd0ID,Ca|
|00001910| 72 64 30 73 70 6e 0d 20 | 20 20 20 67 6c 6f 62 61 |rd0spn. | globa|
|00001920| 6c 20 43 61 72 64 43 6c | 73 2c 43 61 72 64 49 44 |l CardCl|s,CardID|
|00001930| 2c 43 61 72 64 43 6c 73 | 49 44 0d 20 20 20 20 67 |,CardCls|ID. g|
|00001940| 6c 6f 62 61 6c 20 53 70 | 4e 75 6d 0d 20 20 20 20 |lobal Sp|Num. |
|00001950| 0d 20 20 20 20 73 65 74 | 20 53 70 4e 75 6d 20 3d |. set| SpNum =|
|00001960| 20 74 68 65 20 63 6c 69 | 63 6b 4f 6e 0d 20 20 20 | the cli|ckOn. |
|00001970| 20 70 75 70 70 65 74 53 | 70 72 69 74 65 20 53 70 | puppetS|prite Sp|
|00001980| 4e 75 6d 20 2c 20 54 52 | 55 45 0d 20 20 20 20 0d |Num , TR|UE. .|
|00001990| 20 20 20 20 73 65 74 20 | 74 68 65 20 63 61 73 74 | set |the cast|
|000019a0| 4e 75 6d 20 6f 66 20 73 | 70 72 69 74 65 20 53 70 |Num of s|prite Sp|
|000019b0| 4e 75 6d 20 3d 20 74 68 | 65 20 6e 75 6d 62 65 72 |Num = th|e number|
|000019c0| 20 6f 66 20 63 61 73 74 | 20 22 57 5f 30 31 2d 30 | of cast| "W_01-0|
|000019d0| 31 22 0d 20 20 20 20 57 | 75 70 64 61 74 65 53 74 |1". W|updateSt|
|000019e0| 61 67 65 20 0d 20 20 20 | 20 73 65 74 20 74 68 65 |age . | set the|
|000019f0| 20 63 61 73 74 4e 75 6d | 20 6f 66 20 73 70 72 69 | castNum| of spri|
|00001a00| 74 65 20 53 70 4e 75 6d | 20 3d 20 74 68 65 20 6e |te SpNum| = the n|
|00001a10| 75 6d 62 65 72 20 6f 66 | 20 63 61 73 74 20 22 57 |umber of| cast "W|
|00001a20| 5f 30 32 2d 30 31 22 0d | 20 20 20 20 57 75 70 64 |_02-01".| Wupd|
|00001a30| 61 74 65 53 74 61 67 65 | 20 0d 20 20 20 20 73 65 |ateStage| . se|
|00001a40| 74 20 74 68 65 20 63 61 | 73 74 4e 75 6d 20 6f 66 |t the ca|stNum of|
|00001a50| 20 73 70 72 69 74 65 20 | 53 70 4e 75 6d 20 3d 20 | sprite |SpNum = |
|00001a60| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 61 |the numb|er of ca|
|00001a70| 73 74 20 22 57 5f 30 33 | 2d 30 31 22 0d 20 20 20 |st "W_03|-01". |
|00001a80| 20 57 75 70 64 61 74 65 | 53 74 61 67 65 20 0d 20 | Wupdate|Stage . |
|00001a90| 20 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 4e | set t|he castN|
|00001aa0| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 53 70 4e |um of sp|rite SpN|
|00001ab0| 75 6d 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |um = the| number |
|00001ac0| 6f 66 20 63 61 73 74 20 | 22 57 5f 30 36 2d 30 31 |of cast |"W_06-01|
|00001ad0| 22 2b 43 61 72 64 4f 66 | 73 0d 20 20 20 20 57 75 |"+CardOf|s. Wu|
|00001ae0| 70 64 61 74 65 53 74 61 | 67 65 0d 20 20 20 20 73 |pdateSta|ge. s|
|00001af0| 65 74 20 74 68 65 20 63 | 61 73 74 4e 75 6d 20 6f |et the c|astNum o|
|00001b00| 66 20 73 70 72 69 74 65 | 20 53 70 4e 75 6d 20 3d |f sprite| SpNum =|
|00001b10| 20 74 68 65 20 6e 75 6d | 62 65 72 20 6f 66 20 63 | the num|ber of c|
|00001b20| 61 73 74 20 22 57 5f 30 | 35 2d 30 31 22 2b 43 61 |ast "W_0|5-01"+Ca|
|00001b30| 72 64 4f 66 73 0d 20 20 | 20 20 57 75 70 64 61 74 |rdOfs. | Wupdat|
|00001b40| 65 53 74 61 67 65 0d 20 | 20 20 20 73 65 74 20 74 |eStage. | set t|
|00001b50| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00001b60| 72 69 74 65 20 53 70 4e | 75 6d 20 3d 20 74 68 65 |rite SpN|um = the|
|00001b70| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 61 73 74 20 | number |of cast |
|00001b80| 22 57 5f 30 34 2d 30 31 | 22 2b 43 61 72 64 4f 66 |"W_04-01|"+CardOf|
|00001b90| 73 0d 20 20 20 20 57 75 | 70 64 61 74 65 53 74 61 |s. Wu|pdateSta|
|00001ba0| 67 65 0d 20 20 20 20 0d | 20 20 20 20 69 66 20 43 |ge. .| if C|
|00001bb0| 61 72 64 50 74 72 3d 30 | 20 74 68 65 6e 0d 20 20 |ardPtr=0| then. |
|00001bc0| 20 20 20 20 20 20 2d 2d | 82 50 96 87 96 da 0d 20 | --|.P..... |
|00001bd0| 20 20 20 20 20 20 20 73 | 65 74 20 43 61 72 64 30 | s|et Card0|
|00001be0| 4f 66 73 3d 43 61 72 64 | 4f 66 73 0d 20 20 20 20 |Ofs=Card|Ofs. |
|00001bf0| 20 20 20 20 73 65 74 20 | 43 61 72 64 30 49 44 3d | set |Card0ID=|
|00001c00| 43 61 72 64 49 44 0d 20 | 20 20 20 20 20 20 20 73 |CardID. | s|
|00001c10| 65 74 20 43 61 72 64 30 | 73 70 6e 3d 53 70 4e 75 |et Card0|spn=SpNu|
|00001c20| 6d 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 43 61 |m. | set Ca|
|00001c30| 72 64 50 74 72 3d 31 0d | 20 20 20 20 65 6c 73 65 |rdPtr=1.| else|
|00001c40| 0d 20 20 20 20 20 20 20 | 20 2d 2d 82 51 96 87 96 |. | --.Q...|
|00001c50| da 0d 20 20 20 20 20 20 | 20 20 73 65 74 20 43 6f |.. | set Co|
|00001c60| 75 6e 74 3d 43 6f 75 6e | 74 2d 31 0d 20 20 20 20 |unt=Coun|t-1. |
|00001c70| 20 20 20 20 0d 20 20 20 | 20 20 20 20 20 69 66 20 | . | if |
|00001c80| 43 61 72 64 30 4f 66 73 | 3d 43 61 72 64 4f 66 73 |Card0Ofs|=CardOfs|
|00001c90| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 20 20 | then. | |
|00001ca0| 20 20 2d 2d 82 a0 82 bd | 82 e8 8f 88 97 9d 81 41 | --....|.......A|
|00001cb0| 83 58 83 52 83 41 89 c1 | 8e 5a 0d 20 20 20 20 20 |.X.R.A..|.Z. |
|00001cc0| 20 20 20 20 20 20 20 41 | 64 64 53 63 6f 72 65 0d | A|ddScore.|
|00001cd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 75 74 20 | | put |
|00001ce0| 22 82 e2 82 c1 82 bd 81 | 49 22 20 69 6e 74 6f 20 |".......|I" into |
|00001cf0| 66 69 65 6c 64 20 22 4d | 73 67 42 6f 78 22 0d 20 |field "M|sgBox". |
|00001d00| 20 20 20 20 20 20 20 20 | 20 20 20 0d 20 20 20 20 | | . |
|00001d10| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 | else|. |
|00001d20| 20 20 20 20 20 2d 2d 83 | 45 83 47 83 43 83 67 8f | --.|E.G.C.g.|
|00001d30| 88 97 9d 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|00001d40| 73 65 74 20 69 3d 30 0d | 20 20 20 20 20 20 20 20 |set i=0.| |
|00001d50| 20 20 20 20 72 65 70 65 | 61 74 20 77 68 69 6c 65 | repe|at while|
|00001d60| 20 69 3c 31 30 0d 20 20 | 20 20 20 20 20 20 20 20 | i<10. | |
|00001d70| 20 20 20 20 20 20 73 65 | 74 20 69 3d 69 2b 31 0d | se|t i=i+1.|
|00001d80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001d90| 57 75 70 64 61 74 65 53 | 74 61 67 65 0d 20 20 20 |WupdateS|tage. |
|00001da0| 20 20 20 20 20 20 20 20 | 20 65 6e 64 20 72 65 70 | | end rep|
|00001db0| 65 61 74 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |eat. | |
|00001dc0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 2d 2d 82 |. | --.|
|00001dd0| cd 82 b8 82 ea 8f 88 97 | 9d 81 41 83 4a 81 5b 83 |........|..A.J.[.|
|00001de0| 68 82 f0 95 c2 82 b6 82 | e9 20 0d 20 20 20 20 20 |h.......|. . |
|00001df0| 20 20 20 20 20 20 20 70 | 75 74 20 22 82 cd 82 b8 | p|ut "....|
|00001e00| 82 ea 82 be 82 e6 22 20 | 69 6e 74 6f 20 66 69 65 |......" |into fie|
|00001e10| 6c 64 20 22 4d 73 67 42 | 6f 78 22 0d 20 20 20 20 |ld "MsgB|ox". |
|00001e20| 20 20 20 20 20 20 20 20 | 73 65 74 20 43 61 72 64 | |set Card|
|00001e30| 43 6c 73 3d 43 61 72 64 | 4f 66 73 0d 20 20 20 20 |Cls=Card|Ofs. |
|00001e40| 20 20 20 20 20 20 20 20 | 73 65 74 20 43 61 72 64 | |set Card|
|00001e50| 43 6c 73 49 44 3d 43 61 | 72 64 49 44 0d 20 20 20 |ClsID=Ca|rdID. |
|00001e60| 20 20 20 20 20 20 20 20 | 20 73 65 74 20 53 70 4e | | set SpN|
|00001e70| 75 6d 3d 53 70 4e 75 6d | 0d 20 20 20 20 20 20 20 |um=SpNum|. |
|00001e80| 20 20 20 20 20 43 61 72 | 64 43 6c 6f 73 65 0d 20 | Car|dClose. |
|00001e90| 20 20 20 20 20 20 20 20 | 20 20 20 73 65 74 20 43 | | set C|
|00001ea0| 61 72 64 43 6c 73 3d 43 | 61 72 64 30 4f 66 73 0d |ardCls=C|ard0Ofs.|
|00001eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 74 20 | | set |
|00001ec0| 43 61 72 64 43 6c 73 49 | 44 3d 43 61 72 64 30 49 |CardClsI|D=Card0I|
|00001ed0| 44 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 |D. | se|
|00001ee0| 74 20 53 70 4e 75 6d 3d | 43 61 72 64 30 73 70 6e |t SpNum=|Card0spn|
|00001ef0| 20 20 20 20 20 20 20 20 | 20 20 20 20 0d 20 20 20 | | . |
|00001f00| 20 20 20 20 20 20 20 20 | 20 43 61 72 64 43 6c 6f | | CardClo|
|00001f10| 73 65 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 70 |se. | p|
|00001f20| 75 74 20 22 83 74 83 40 | 83 43 83 67 21 21 22 20 |ut ".t.@|.C.g!!" |
|00001f30| 69 6e 74 6f 20 66 69 65 | 6c 64 20 22 4d 73 67 42 |into fie|ld "MsgB|
|00001f40| 6f 78 22 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |ox". | |
|00001f50| 0d 20 20 20 20 20 20 20 | 20 65 6e 64 20 69 66 0d |. | end if.|
|00001f60| 20 20 20 20 20 20 20 20 | 70 75 74 20 43 6f 75 6e | |put Coun|
|00001f70| 74 20 69 6e 74 6f 20 66 | 69 65 6c 64 20 22 43 6f |t into f|ield "Co|
|00001f80| 75 6e 74 22 0d 20 20 20 | 20 20 20 20 20 73 65 74 |unt". | set|
|00001f90| 20 43 61 72 64 50 74 72 | 3d 30 0d 20 20 20 20 65 | CardPtr|=0. e|
|00001fa0| 6e 64 20 69 66 20 20 20 | 20 0d 65 6e 64 20 43 61 |nd if | .end Ca|
|00001fb0| 72 64 4f 70 65 6e 0d 0d | 0d 6f 6e 20 41 64 64 53 |rdOpen..|.on AddS|
|00001fc0| 63 6f 72 65 0d 20 20 20 | 20 67 6c 6f 62 61 6c 20 |core. | global |
|00001fd0| 53 63 6f 72 65 2c 43 61 | 72 64 4f 66 73 0d 20 20 |Score,Ca|rdOfs. |
|00001fe0| 20 20 73 65 74 20 69 3d | 43 61 72 64 4f 66 73 2f | set i=|CardOfs/|
|00001ff0| 38 0d 20 20 20 20 69 66 | 20 69 3d 30 20 74 68 65 |8. if| i=0 the|
|00002000| 6e 20 73 65 74 20 53 63 | 6f 72 65 3d 53 63 6f 72 |n set Sc|ore=Scor|
|00002010| 65 2b 31 0d 20 20 20 20 | 69 66 20 69 3d 31 20 74 |e+1. |if i=1 t|
|00002020| 68 65 6e 20 73 65 74 20 | 53 63 6f 72 65 3d 53 63 |hen set |Score=Sc|
|00002030| 6f 72 65 2b 32 0d 20 20 | 20 20 69 66 20 69 3d 32 |ore+2. | if i=2|
|00002040| 20 74 68 65 6e 20 73 65 | 74 20 53 63 6f 72 65 3d | then se|t Score=|
|00002050| 53 63 6f 72 65 2b 33 0d | 20 20 20 20 69 66 20 69 |Score+3.| if i|
|00002060| 3d 33 20 74 68 65 6e 20 | 73 65 74 20 53 63 6f 72 |=3 then |set Scor|
|00002070| 65 3d 53 63 6f 72 65 2b | 34 0d 20 20 20 20 69 66 |e=Score+|4. if|
|00002080| 20 69 3d 34 20 74 68 65 | 6e 20 73 65 74 20 53 63 | i=4 the|n set Sc|
|00002090| 6f 72 65 3d 53 63 6f 72 | 65 2b 35 0d 20 20 20 20 |ore=Scor|e+5. |
|000020a0| 69 66 20 69 3d 35 20 74 | 68 65 6e 20 73 65 74 20 |if i=5 t|hen set |
|000020b0| 53 63 6f 72 65 3d 53 63 | 6f 72 65 2b 31 30 0d 20 |Score=Sc|ore+10. |
|000020c0| 20 20 20 69 66 20 69 3d | 36 20 74 68 65 6e 20 73 | if i=|6 then s|
|000020d0| 65 74 20 53 63 6f 72 65 | 3d 53 63 6f 72 65 2b 31 |et Score|=Score+1|
|000020e0| 35 0d 20 20 20 20 69 66 | 20 69 3d 37 20 74 68 65 |5. if| i=7 the|
|000020f0| 6e 20 73 65 74 20 53 63 | 6f 72 65 3d 53 63 6f 72 |n set Sc|ore=Scor|
|00002100| 65 2b 32 30 0d 20 20 20 | 20 70 75 74 20 53 63 6f |e+20. | put Sco|
|00002110| 72 65 20 69 6e 74 6f 20 | 66 69 65 6c 64 20 22 53 |re into |field "S|
|00002120| 63 6f 72 65 22 0d 65 6e | 64 20 41 64 64 53 63 6f |core".en|d AddSco|
|00002130| 72 65 0d 0d 0d 6f 6e 20 | 43 61 72 64 43 6c 6f 73 |re...on |CardClos|
|00002140| 65 0d 20 20 20 20 0d 20 | 20 20 20 67 6c 6f 62 61 |e. . | globa|
|00002150| 6c 20 43 61 72 64 43 6c | 73 2c 43 61 72 64 43 6c |l CardCl|s,CardCl|
|00002160| 73 49 44 2c 53 70 4e 75 | 6d 0d 20 20 20 20 2d 2d |sID,SpNu|m. --|
|00002170| 62 65 65 70 20 31 0d 20 | 20 20 20 0d 20 20 20 20 |beep 1. | . |
|00002180| 70 75 70 70 65 74 53 70 | 72 69 74 65 20 53 70 4e |puppetSp|rite SpN|
|00002190| 75 6d 20 2c 20 54 52 55 | 45 0d 20 20 20 20 0d 20 |um , TRU|E. . |
|000021a0| 20 20 20 73 65 74 20 74 | 68 65 20 63 61 73 74 4e | set t|he castN|
|000021b0| 75 6d 20 6f 66 20 73 70 | 72 69 74 65 20 53 70 4e |um of sp|rite SpN|
|000021c0| 75 6d 20 3d 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |um = the| number |
|000021d0| 6f 66 20 63 61 73 74 20 | 22 57 5f 30 34 2d 30 31 |of cast |"W_04-01|
|000021e0| 22 2b 43 61 72 64 43 6c | 73 0d 20 20 20 20 57 75 |"+CardCl|s. Wu|
|000021f0| 70 64 61 74 65 53 74 61 | 67 65 20 0d 20 20 20 20 |pdateSta|ge . |
|00002200| 73 65 74 20 74 68 65 20 | 63 61 73 74 4e 75 6d 20 |set the |castNum |
|00002210| 6f 66 20 73 70 72 69 74 | 65 20 53 70 4e 75 6d 20 |of sprit|e SpNum |
|00002220| 3d 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |= the nu|mber of |
|00002230| 63 61 73 74 20 22 57 5f | 30 35 2d 30 31 22 2b 43 |cast "W_|05-01"+C|
|00002240| 61 72 64 43 6c 73 0d 20 | 20 20 20 57 75 70 64 61 |ardCls. | Wupda|
|00002250| 74 65 53 74 61 67 65 20 | 0d 20 20 20 20 73 65 74 |teStage |. set|
|00002260| 20 74 68 65 20 63 61 73 | 74 4e 75 6d 20 6f 66 20 | the cas|tNum of |
|00002270| 73 70 72 69 74 65 20 53 | 70 4e 75 6d 20 3d 20 74 |sprite S|pNum = t|
|00002280| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 61 73 |he numbe|r of cas|
|00002290| 74 20 22 57 5f 30 36 2d | 30 31 22 2b 43 61 72 64 |t "W_06-|01"+Card|
|000022a0| 43 6c 73 0d 20 20 20 20 | 57 75 70 64 61 74 65 53 |Cls. |WupdateS|
|000022b0| 74 61 67 65 20 0d 20 20 | 20 20 73 65 74 20 74 68 |tage . | set th|
|000022c0| 65 20 63 61 73 74 4e 75 | 6d 20 6f 66 20 73 70 72 |e castNu|m of spr|
|000022d0| 69 74 65 20 53 70 4e 75 | 6d 20 3d 20 74 68 65 20 |ite SpNu|m = the |
|000022e0| 6e 75 6d 62 65 72 20 6f | 66 20 63 61 73 74 20 22 |number o|f cast "|
|000022f0| 57 5f 30 33 2d 30 31 22 | 2b 43 61 72 64 43 6c 73 |W_03-01"|+CardCls|
|00002300| 0d 20 20 20 20 57 75 70 | 64 61 74 65 53 74 61 67 |. Wup|dateStag|
|00002310| 65 0d 20 20 20 20 73 65 | 74 20 74 68 65 20 63 61 |e. se|t the ca|
|00002320| 73 74 4e 75 6d 20 6f 66 | 20 73 70 72 69 74 65 20 |stNum of| sprite |
|00002330| 53 70 4e 75 6d 20 3d 20 | 74 68 65 20 6e 75 6d 62 |SpNum = |the numb|
|00002340| 65 72 20 6f 66 20 63 61 | 73 74 20 22 57 5f 30 32 |er of ca|st "W_02|
|00002350| 2d 30 31 22 2b 43 61 72 | 64 43 6c 73 0d 20 20 20 |-01"+Car|dCls. |
|00002360| 20 57 75 70 64 61 74 65 | 53 74 61 67 65 0d 20 20 | Wupdate|Stage. |
|00002370| 20 20 73 65 74 20 74 68 | 65 20 63 61 73 74 4e 75 | set th|e castNu|
|00002380| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 53 70 4e 75 |m of spr|ite SpNu|
|00002390| 6d 20 3d 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |m = the |number o|
|000023a0| 66 20 63 61 73 74 20 22 | 57 5f 30 31 2d 30 31 22 |f cast "|W_01-01"|
|000023b0| 2b 43 61 72 64 43 6c 73 | 49 44 0d 20 20 20 20 57 |+CardCls|ID. W|
|000023c0| 75 70 64 61 74 65 53 74 | 61 67 65 0d 20 20 20 20 |updateSt|age. |
|000023d0| 0d 20 20 20 20 70 75 70 | 70 65 74 53 70 72 69 74 |. pup|petSprit|
|000023e0| 65 20 53 70 4e 75 6d 20 | 2c 20 46 41 4c 53 45 0d |e SpNum |, FALSE.|
|000023f0| 20 20 20 20 57 75 70 64 | 61 74 65 53 74 61 67 65 | Wupd|ateStage|
|00002400| 0d 20 20 20 20 0d 65 6e | 64 20 43 61 72 64 43 6c |. .en|d CardCl|
|00002410| 6f 73 65 0d 0d 6f 6e 20 | 57 75 70 64 61 74 65 53 |ose..on |WupdateS|
|00002420| 74 61 67 65 0d 20 20 20 | 20 75 70 64 61 74 65 53 |tage. | updateS|
|00002430| 74 61 67 65 0d 20 20 20 | 20 73 65 74 20 6c 63 6e |tage. | set lcn|
|00002440| 74 3d 74 68 65 20 74 69 | 63 6b 73 20 0d 20 20 20 |t=the ti|cks . |
|00002450| 20 72 65 70 65 61 74 20 | 77 68 69 6c 65 20 74 68 | repeat |while th|
|00002460| 65 20 74 69 63 6b 73 3c | 6c 63 6e 74 2b 33 0d 20 |e ticks<|lcnt+3. |
|00002470| 20 20 20 20 20 20 20 75 | 70 64 61 74 65 53 74 61 | u|pdateSta|
|00002480| 67 65 0d 20 20 20 20 65 | 6e 64 20 72 65 70 65 61 |ge. e|nd repea|
|00002490| 74 0d 65 6e 64 20 57 75 | 70 64 61 74 65 53 74 61 |t.end Wu|pdateSta|
|000024a0| 67 65 0d 0d 6f 6e 20 58 | 43 61 72 64 4f 70 65 6e |ge..on X|CardOpen|
|000024b0| 0d 20 20 20 20 67 6c 6f | 62 61 6c 20 43 61 72 64 |. glo|bal Card|
|000024c0| 4f 66 73 2c 43 61 72 64 | 50 74 72 0d 20 20 20 20 |Ofs,Card|Ptr. |
|000024d0| 67 6c 6f 62 61 6c 20 53 | 63 6f 72 65 2c 43 6f 75 |global S|core,Cou|
|000024e0| 6e 74 0d 20 20 20 20 67 | 6c 6f 62 61 6c 20 43 61 |nt. g|lobal Ca|
|000024f0| 72 64 30 4f 66 73 2c 43 | 61 72 64 30 49 44 2c 43 |rd0Ofs,C|ard0ID,C|
|00002500| 61 72 64 30 73 70 6e 0d | 20 20 20 20 67 6c 6f 62 |ard0spn.| glob|
|00002510| 61 6c 20 43 61 72 64 43 | 6c 73 2c 43 61 72 64 49 |al CardC|ls,CardI|
|00002520| 44 2c 43 61 72 64 43 6c | 73 49 44 0d 20 20 20 20 |D,CardCl|sID. |
|00002530| 0d 20 20 20 20 73 65 74 | 20 53 70 4e 75 6d 3d 43 |. set| SpNum=C|
|00002540| 61 72 64 49 44 2f 38 2b | 32 0d 20 20 20 20 70 75 |ardID/8+|2. pu|
|00002550| 70 70 65 74 53 70 72 69 | 74 65 20 53 70 4e 75 6d |ppetSpri|te SpNum|
|00002560| 20 2c 20 54 52 55 45 0d | 20 20 20 20 0d 20 20 20 | , TRUE.| . |
|00002570| 20 73 65 74 20 74 68 65 | 20 63 61 73 74 4e 75 6d | set the| castNum|
|00002580| 20 6f 66 20 73 70 72 69 | 74 65 20 53 70 4e 75 6d | of spri|te SpNum|
|00002590| 20 3d 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 | = the n|umber of|
|000025a0| 20 63 61 73 74 20 22 57 | 5f 30 31 2d 30 31 22 0d | cast "W|_01-01".|
|000025b0| 20 20 20 20 57 75 70 64 | 61 74 65 53 74 61 67 65 | Wupd|ateStage|
|000025c0| 20 0d 20 20 20 20 73 65 | 74 20 74 68 65 20 63 61 | . se|t the ca|
|000025d0| 73 74 4e 75 6d 20 6f 66 | 20 73 70 72 69 74 65 20 |stNum of| sprite |
|000025e0| 53 70 4e 75 6d 20 3d 20 | 74 68 65 20 6e 75 6d 62 |SpNum = |the numb|
|000025f0| 65 72 20 6f 66 20 63 61 | 73 74 20 22 57 5f 30 32 |er of ca|st "W_02|
|00002600| 2d 30 31 22 0d 20 20 20 | 20 57 75 70 64 61 74 65 |-01". | Wupdate|
|00002610| 53 74 61 67 65 20 0d 20 | 20 20 20 73 65 74 20 74 |Stage . | set t|
|00002620| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|00002630| 72 69 74 65 20 53 70 4e | 75 6d 20 3d 20 74 68 65 |rite SpN|um = the|
|00002640| 20 6e 75 6d 62 65 72 20 | 6f 66 20 63 61 73 74 20 | number |of cast |
|00002650| 22 57 5f 30 33 2d 30 31 | 22 0d 20 20 20 20 57 75 |"W_03-01|". Wu|
|00002660| 70 64 61 74 65 53 74 61 | 67 65 20 0d 20 20 20 20 |pdateSta|ge . |
|00002670| 73 65 74 20 74 68 65 20 | 63 61 73 74 4e 75 6d 20 |set the |castNum |
|00002680| 6f 66 20 73 70 72 69 74 | 65 20 53 70 4e 75 6d 20 |of sprit|e SpNum |
|00002690| 3d 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |= the nu|mber of |
|000026a0| 63 61 73 74 20 22 57 5f | 30 36 2d 30 31 22 2b 43 |cast "W_|06-01"+C|
|000026b0| 61 72 64 4f 66 73 0d 20 | 20 20 20 57 75 70 64 61 |ardOfs. | Wupda|
|000026c0| 74 65 53 74 61 67 65 0d | 20 20 20 20 73 65 74 20 |teStage.| set |
|000026d0| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|000026e0| 70 72 69 74 65 20 53 70 | 4e 75 6d 20 3d 20 74 68 |prite Sp|Num = th|
|000026f0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 63 61 73 74 |e number| of cast|
|00002700| 20 22 57 5f 30 35 2d 30 | 31 22 2b 43 61 72 64 4f | "W_05-0|1"+CardO|
|00002710| 66 73 0d 20 20 20 20 57 | 75 70 64 61 74 65 53 74 |fs. W|updateSt|
|00002720| 61 67 65 0d 20 20 20 20 | 73 65 74 20 74 68 65 20 |age. |set the |
|00002730| 63 61 73 74 4e 75 6d 20 | 6f 66 20 73 70 72 69 74 |castNum |of sprit|
|00002740| 65 20 53 70 4e 75 6d 20 | 3d 20 74 68 65 20 6e 75 |e SpNum |= the nu|
|00002750| 6d 62 65 72 20 6f 66 20 | 63 61 73 74 20 22 57 5f |mber of |cast "W_|
|00002760| 30 34 2d 30 31 22 2b 43 | 61 72 64 4f 66 73 0d 20 |04-01"+C|ardOfs. |
|00002770| 20 20 20 57 75 70 64 61 | 74 65 53 74 61 67 65 0d | Wupda|teStage.|
|00002780| 20 20 20 20 0d 20 20 20 | 20 70 75 70 70 65 74 53 | . | puppetS|
|00002790| 70 72 69 74 65 20 53 70 | 4e 75 6d 20 2c 20 46 41 |prite Sp|Num , FA|
|000027a0| 4c 53 45 0d 20 20 20 20 | 0d 65 6e 64 20 58 43 61 |LSE. |.end XCa|
|000027b0| 72 64 4f 70 65 6e 0f 74 | 74 73 75 6a 69 20 2d 20 |rdOpen.t|tsuji - |
|000027c0| 96 90 8d 48 96 5b 13 93 | 63 92 86 8f 47 98 61 20 |...H.[..|c...G.a |
|000027d0| 2d 20 8a 4a 94 ad 82 51 | 89 db 00 00 |- .J...Q|.... |
+--------+-------------------------+-------------------------+--------+--------+
